-- card: 25693 from stack: in -- bmap block id: 26501 -- flags: 4000 -- background id: 25947 -- name: TD Personal ----- HyperTalk script ----- on openCard get (item 2 of the abbrev date & ", " & char 4 to 5 of item 3 of the abbrev date) put empty into char 1 of it if card field "Birthdate" is empty then put it into card field "Birthdate" end if if card field "Date hired" is empty then put it into card field "Date hired" end if tabKey end openCard -- part 1 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=109 top=71 right=91 bottom=191 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Teacher # -- part 2 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=244 top=71 right=91 bottom=301 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Title ----- HyperTalk script ----- on closeField global teacherName if (card field "First Name" is not empty) OR (card field "Last Name" is not empty) then put card field "Title" & " " & card field "First Name" & " " & card field "Last Name" into teacherName else put empty into teacherName end closeField -- part 3 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=109 top=96 right=116 bottom=301 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Last Name ----- HyperTalk script ----- on closeField global teacherName if (card field "First Name" is not empty) OR (card field "Last Name" is not empty) then put card field "Title" & " " & card field "First Name" & " " & card field "Last Name" into teacherName else put empty into teacherName end closeField -- part 4 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=109 top=121 right=141 bottom=301 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: First Name ----- HyperTalk script ----- on closeField global teacherName if (card field "First Name" is not empty) OR (card field "Last Name" is not empty) then put card field "Title" & " " & card field "First Name" & " " & card field "Last Name" into teacherName else put empty into teacherName end closeField -- part 5 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=362 top=121 right=141 bottom=485 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Middle -- part 6 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=109 top=146 right=166 bottom=410 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Address -- part 7 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=109 top=171 right=191 bottom=269 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: City -- part 8 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=109 top=196 right=216 bottom=182 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: State -- part 9 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=109 top=221 right=241 bottom=182 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Zip Code -- part 10 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=356 top=171 right=191 bottom=485 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: S.S.N. -- part 11 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=381 top=196 right=216 bottom=485 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Phone # -- part 12 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=381 top=221 right=241 bottom=485 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Emergency -- part 13 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=88 top=249 right=269 bottom=180 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Birthdate -- part 14 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=88 top=275 right=295 bottom=180 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Date hired -- part 15 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=341 top=249 right=267 bottom=487 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Home Language -- part 16 (field) -- low flags: 01 -- high flags: 0000 -- rect: left=341 top=275 right=293 bottom=487 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Ethnic Category -- part 17 (button) -- low flags: 00 -- high flags: C006 -- rect: left=313 top=72 right=88 bottom=368 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Male ----- HyperTalk script ----- on mouseUp set hilite of button "Female" to false set hilite of button "Male" to true end mouseUp -- part 18 (button) -- low flags: 00 -- high flags: 8006 -- rect: left=368 top=72 right=88 bottom=438 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Female ----- HyperTalk script ----- on mouseUp set hilite of button "Male" to false set hilite of button "Female" to true end mouseUp -- part 19 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=210 top=250 right=266 bottom=486 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Home Language ----- HyperTalk script ----- on mouseDown global checkLoc1 if first item of the clickLoc >= 333 then get the rect of me put item 1 of it + 123 into horz put item 2 of it into vert set hilite of me to true put "NA ,Chinese,English," into menuList put "French,German,Hatian,Japanese,Russian,Spanish" after menuList put PopUpMenu(menuList,vert,horz,checkLoc1) into temp if temp > 0 then put item temp of menuList into card field "Home Language" put temp into checkLoc1 end if set hilite of me to false end if end mouseDown -- part 20 (button) -- low flags: 00 -- high flags: 0000 -- rect: left=210 top=276 right=292 bottom=486 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: Ethnic Category ----- HyperTalk script ----- on mouseDown global checkLoc2 if first item of the clickLoc >= 333 then get the rect of me put item 1 of it + 123 into horz put item 2 of it into vert set hilite of me to true put "NA ,American," into menuList put "Canadian,Chinese,French,Greek,Hatian,Japanese," after menuList put "Korean,Mexican,Native Indian,Spanish,Ukranian" after menuList put PopUpMenu(menuList,vert,horz,checkLoc2) into temp if temp > 0 then put item temp of menuList into card field "Ethnic Category" put temp into checkLoc2 end if set hilite of me to false end if end mouseDown -- part contents for card part 15 ----- text ----- NA -- part contents for card part 16 ----- text ----- NA